home *** CD-ROM | disk | FTP | other *** search
/ Forging America - The Int…ive History of Bethlehem / ForgingAmerica.iso / pc / buildsintroduction.dxr / template elements_22_template rollover for sound.ls < prev    next >
Encoding:
Text File  |  2003-01-01  |  651 b   |  30 lines
  1. property spritenumber, memberrootname, donotdomouseleave
  2.  
  3. on mouseEnter
  4.   spritenumber = the rollover
  5.   memberrootname = sprite(spritenumber).member.name
  6.   sprite(spritenumber).member = memberrootname & ",over"
  7.   donotdomouseleave = 0
  8. end
  9.  
  10. on mouseLeave
  11.   put "doing the leave"
  12.   if the stillDown then
  13.     sprite(spritenumber).member = memberrootname
  14.   end if
  15.   if donotdomouseleave = 1 then
  16.     exit
  17.   end if
  18.   sprite(spritenumber).member = memberrootname
  19. end
  20.  
  21. on mouseDown
  22.   donotdomouseleave = 1
  23.   sprite(spritenumber).member = memberrootname & ",down"
  24. end
  25.  
  26. on mouseUp
  27.   sprite(spritenumber).member = memberrootname & ",over"
  28.   dosoundtoggle()
  29. end
  30.